# Title: Programa 34                                      Filename: Capiluto7-34
# Author: Lopez Valenzuela Marco A.                     Date: 27/05/17
# Description: 
# Un cuadrado latino es una distribucion tabu
# lar de N x N numeros, de tal manera que cada
# numero aparezca en cada fila y en cada co
# lumns. Imprimir todos los cuadrados latinos
# de orden N para N = 2, 3,...,
# Input: -
# Output: -

DATA SEGMENT
NUM DB ?
RES DB 10 DUP (‘$’)
MSG1 DB “ENTER NUMBER : $”
MSG2 DB 10,13,”SQUARE OF NUMBER IS : $”

DATA ENDS

CODE SEGMENT
ASSUME DS:DATA,CS:CODE
START:
MOV AX,DATA
MOV DS,AX

LEA DX,MSG1
MOV AH,9
INT 21H

MOV AH,1
INT 21H

SUB AL,30H
MOV NUM,AL
MOV AH,0

MUL NUM

LEA SI,RES
CALL HEX2DEC

LEA DX,MSG2
MOV AH,9
INT 21H

LEA DX,RES
MOV AH,9
INT 21H

MOV AH,4CH
INT 21H
CODE ENDS

HEX2DEC PROC NEAR
MOV CX,0
MOV BX,10

LOOP1: MOV DX,0
DIV BX
ADD DL,30H
PUSH DX
INC CX
CMP AX,9
JG LOOP1

ADD AL,30H
MOV [SI],AL

LOOP2: POP AX
INC SI
MOV [SI],AL
LOOP LOOP2
RET
HEX2DEC ENDP

END START
